home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue59 / System / TarUnit.dfm < prev    next >
Encoding:
Text File  |  2000-06-08  |  1.9 KB  |  98 lines
  1. object Form1: TForm1
  2.   Left = 206
  3.   Top = 121
  4.   BorderStyle = bsDialog
  5.   Caption = 'Tar Demo'
  6.   ClientHeight = 214
  7.   ClientWidth = 747
  8.   Color = clBtnFace
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   OldCreateOrder = False
  15.   Position = poScreenCenter
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object Label1: TLabel
  19.     Left = 104
  20.     Top = 180
  21.     Width = 331
  22.     Height = 13
  23.     Caption = 
  24.       'To extract a file from the tar archive, double-click the wanted ' +
  25.       'file entry.'
  26.     Visible = False
  27.   end
  28.   object Files: TListView
  29.     Left = 8
  30.     Top = 8
  31.     Width = 730
  32.     Height = 150
  33.     Color = 8404992
  34.     Columns = <
  35.       item
  36.         Caption = 'Filename'
  37.         Width = 200
  38.       end
  39.       item
  40.         Caption = 'Date'
  41.         Width = 70
  42.       end
  43.       item
  44.         Caption = 'Time'
  45.         Width = 70
  46.       end
  47.       item
  48.         Caption = 'Size'
  49.         Width = 70
  50.       end
  51.       item
  52.         Caption = 'Permissions'
  53.         Width = 100
  54.       end
  55.       item
  56.         Caption = 'User'
  57.         Width = 60
  58.       end
  59.       item
  60.         Caption = 'Group'
  61.         Width = 60
  62.       end
  63.       item
  64.         Caption = 'FileOffset'
  65.         Width = 100
  66.       end>
  67.     Font.Charset = DEFAULT_CHARSET
  68.     Font.Color = clYellow
  69.     Font.Height = -11
  70.     Font.Name = 'MS Sans Serif'
  71.     Font.Style = []
  72.     RowSelect = True
  73.     ParentFont = False
  74.     TabOrder = 0
  75.     ViewStyle = vsReport
  76.     OnDblClick = FilesDblClick
  77.   end
  78.   object Button1: TButton
  79.     Left = 16
  80.     Top = 176
  81.     Width = 75
  82.     Height = 25
  83.     Caption = 'Open...'
  84.     TabOrder = 1
  85.     OnClick = Button1Click
  86.   end
  87.   object OpenDialog1: TOpenDialog
  88.     DefaultExt = 'tar'
  89.     Filter = 'tar files|*.tar'
  90.     Left = 464
  91.     Top = 168
  92.   end
  93.   object SaveDialog1: TSaveDialog
  94.     Left = 496
  95.     Top = 168
  96.   end
  97. end
  98.